﻿using System;
using System.IO;
using System.Text;
using System.Text.RegularExpressions;
using System.Collections;
using System.Collections.Generic;
//using Discuz.Common.Generic;

namespace AspDIY.Net.Common
{
    /// <summary>
    /// Template为页面模板类.
    /// </summary>
    public abstract class PageTemplate
    {
        /// <summary>
        /// 正则变量
        /// </summary>
        public static Regex[] r = new Regex[25];

       private Dictionary<string, string> headerTemplateCache = new Dictionary<string, string>();

        /// <summary>
        /// 解析特殊变量
        /// </summary>
        /// <returns></returns>
        public abstract string ReplaceSpecialTemplate(string sitepath, string skinName, string strTemplate);

        static PageTemplate()
        {

            RegexOptions options = RegexOptions.None;

            r[0] = new Regex(@"<%template ([^\[\]\{\}\s]+)%>", options);
            r[1] = new Regex(@"<%loop ((\(([a-zA-Z]+)\) )?)([^\[\]\{\}\s]+) ([^\[\]\{\}\s]+)%>", options);
            r[2] = new Regex(@"<%\/loop%>", options);
            r[3] = new Regex(@"<%while ([^\[\]\{\}\s]+)%>", options);
            r[4] = new Regex(@"<%\/while ([^\[\]\{\}\s]+)%>", options);
            r[5] = new Regex(@"<%if (?:\s*)(([^\s]+)((?:\s*)(\|\||\&\&)(?:\s*)([^\s]+))?)(?:\s*)%>", options);
            r[6] = new Regex(@"<%else(( (?:\s*)if (?:\s*)(([^\s]+)((?:\s*)(\|\||\&\&)(?:\s*)([^\s]+))?))?)(?:\s*)%>", options);
            r[7] = new Regex(@"<%\/if%>", options);

            //解析{var.a}
            r[8] = new Regex(@"(\{strtoint\(([^\s]+?)\)\})", options);

            //解析{request[a]}
            r[9] = new Regex(@"(<%urlencode\(([^\s]+?)\)%>)", options);

            //解析{var[a]}
            r[10] = new Regex(@"(<%datetostr\(([^\s]+?),(.*?)\)%>)", options);
            r[11] = new Regex(@"(\{([^\.\[\]\{\}\s]+)\.([^\[\]\{\}\s]+)\})", options);

            //解析普通变量{}
            r[12] = new Regex(@"(\{request\[([^\[\]\{\}\s]+)\]\})", options);

            //解析==表达式
            r[13] = new Regex(@"(\{([^\[\]\{\}\s]+)\[([^\[\]\{\}\s]+)\]\})", options);

            //解析==表达式
            r[14] = new Regex(@"({([^\[\]/\{\}='\s]+)})", options);

            //解析普通变量{}
            r[15] = new Regex(@"({([^\[\]/\{\}='\s]+)})", options);

            //解析==表达式
            r[16] = new Regex(@"(([=|>|<|!]=)\\" + "\"" + @"([^\s]*)\\" + "\")", options);

            //命名空间
            r[17] = new Regex(@"<%namespace (?:""?)([\s\S]+?)(?:""?)%>", options);

            //C#代码
            r[18] = new Regex(@"<%csharp%>([\s\S]+?)<%/csharp%>", options);

            //set标签
            r[19] = new Regex(@"<%set ((\(([a-zA-Z]+)\))?)(?:\s*)\{([^\s]+)\}(?:\s*)=(?:\s*)(.*?)(?:\s*)%>", options);

            //截取字符串
            r[20] = new Regex(@"(<%getsubstring\(([^\s]+?),(.\d*?),([^\s]+?)\)%>)", options);

            //repeat标签
            r[21] = new Regex(@"<%repeat\(([^\s]+?)(?:\s*),(?:\s*)([^\s]+?)\)%>", options);

            //继承类Inherits
            r[22] = new Regex(@"<%inherits (?:""?)([\s\S]+?)(?:""?)%>", options);

            r[23] = new Regex(@"<%continue%>");
            r[24] = new Regex(@"<%break%>");
        }

        /// <summary>
        /// 获得模板字符串. 首先查找缓存. 如果不在缓存中则从设置中的模板路径来读取模板文件.
        /// 模板文件的路径在Web.config文件中设置.
        /// 如果读取文件成功则会将内容放于缓存中.
        /// </summary>
        /// <param name="sitepath">模板路径</param>
        /// <param name="skinName">模板名</param>
        /// <param name="templateName">模板文件的文件名称, 也是缓存中的模板名称.</param>
        /// <param name="nest">嵌套次数</param>
        /// <param name="templateId">模板id</param>
        /// <returns>string值,如果失败则为"",成功则为模板内容的string</returns>
        public virtual string GetTemplate(string sitepath, string skinName, string templateName, int nest, int templateId)
        {
            return GetTemplate(sitepath, skinName, templateName, "", nest, templateId);
        }
        /// <summary>
        /// 获得模板字符串. 首先查找缓存. 如果不在缓存中则从设置中的模板路径来读取模板文件.
        /// 模板文件的路径在Web.config文件中设置.
        /// 如果读取文件成功则会将内容放于缓存中.
        /// </summary>
        /// <param name="sitepath">模板路径</param>
        /// <param name="skinName">模板名</param>
        /// <param name="templateName">模板文件的文件名称, 也是缓存中的模板名称.</param>
        /// <param name="templateSubDirectory">子模板文件夹名称,生成顶级模板文件时为空,当生成子文件夹中的模板是为子文件夹名称</param>
        /// <param name="nest">嵌套次数</param>
        /// <param name="templateId">模板id</param>
        /// <returns>string值,如果失败则为"",成功则为模板内容的string</returns>
        public virtual string GetTemplate(string sitepath, string skinName, string templateName, string templateSubDirectory, int nest, int templateId)
        {
            if (nest == 2 && headerTemplateCache.ContainsKey(sitepath + skinName + "/" + templateName)) //如果是一级子模板,并且已经存在于缓存中
                return headerTemplateCache[sitepath + skinName + "/" + templateName];

            StringBuilder strReturn = new StringBuilder(220000);
            if (nest < 1)
                nest = 1;
            else if (nest > 5)
                return "";

            string extNamespace = "";
            if (templateSubDirectory != string.Empty && !templateSubDirectory.EndsWith("\\"))
            {
                templateSubDirectory += "\\";
            }
            //生成模板config优先，其次是htm
            string configPathFormatStr = "{0}\\{1}\\{2}{3}.config";
            string htmlPathFormatStr = "{0}\\{1}\\{2}{3}.htm";
            string createFilePath;
            string inherits = "AspDIY.Net.Web." + templateName;

            if (File.Exists(string.Format(configPathFormatStr, Utils.MapPath(sitepath + "templates"), skinName, templateSubDirectory, templateName))) //当前模板当前子文件夹下config存在
                createFilePath = string.Format(configPathFormatStr, Utils.MapPath(sitepath + "templates"), skinName, templateSubDirectory, templateName);
            else if (File.Exists(string.Format(configPathFormatStr, Utils.MapPath(sitepath + "templates"), skinName, "", templateName))) //当前模板当前根文件夹下config存在
                createFilePath = string.Format(configPathFormatStr, Utils.MapPath(sitepath + "templates"), skinName, "", templateName);
            else if (File.Exists(string.Format(configPathFormatStr, Utils.MapPath(sitepath + "templates"), "default", templateSubDirectory, templateName))) //默认模板当前子文件夹下config存在
                createFilePath = string.Format(configPathFormatStr, Utils.MapPath(sitepath + "templates"), "default", templateSubDirectory, templateName);
            else if (File.Exists(string.Format(configPathFormatStr, Utils.MapPath(sitepath + "templates"), "default", "", templateName))) //默认模板当前根文件夹下config存在
                createFilePath = string.Format(configPathFormatStr, Utils.MapPath(sitepath + "templates"), "default", "", templateName);
            else if (File.Exists(string.Format(htmlPathFormatStr, Utils.MapPath(sitepath + "templates"), skinName, templateSubDirectory, templateName))) //当前模板当前子文件夹下html存在
                createFilePath = string.Format(htmlPathFormatStr, Utils.MapPath(sitepath + "templates"), skinName, templateSubDirectory, templateName);
            else if (File.Exists(string.Format(htmlPathFormatStr, Utils.MapPath(sitepath + "templates"), skinName, "", templateName))) //当前模板当前根文件夹下html存在
                createFilePath = string.Format(htmlPathFormatStr, Utils.MapPath(sitepath + "templates"), skinName, "", templateName);
            else if (File.Exists(string.Format(htmlPathFormatStr, Utils.MapPath(sitepath + "templates"), "default", templateSubDirectory, templateName))) //默认模板当前子文件夹下html存在
                createFilePath = string.Format(htmlPathFormatStr, Utils.MapPath(sitepath + "templates"), "default", templateSubDirectory, templateName);
            else if (File.Exists(string.Format(htmlPathFormatStr, Utils.MapPath(sitepath + "templates"), "default", "", templateName))) //默认模板当前根文件夹下html存在
                createFilePath = string.Format(htmlPathFormatStr, Utils.MapPath(sitepath + "templates"), "default", "", templateName);
            else //无文件存在
                return "";

            using (StreamReader objReader = new StreamReader(createFilePath, Encoding.UTF8))
            {
                StringBuilder textOutput = new StringBuilder(70000);

                textOutput.Append(objReader.ReadToEnd());
                objReader.Close();

                //处理命名空间
                if (nest == 1)
                {
                    //命名空间
                    foreach (Match m in r[17].Matches(textOutput.ToString()))
                    {
                        extNamespace += "\r\n<%@ Import namespace=\"" + m.Groups[1] + "\" %>";
                        textOutput.Replace(m.Groups[0].ToString(), string.Empty);
                    }

                    //inherits
                    foreach (Match m in r[22].Matches(textOutput.ToString()))
                    {
                        inherits = m.Groups[1].ToString();
                        textOutput.Replace(m.Groups[0].ToString(), string.Empty);
                        break;
                    }
                    if ("\"".Equals(inherits))
                    {
                        inherits = "AspDIY.Net.Web.PageBase";
                    }

                }
                //处理Csharp语句
                foreach (Match m in r[18].Matches(textOutput.ToString()))
                {
                    textOutput.Replace(m.Groups[0].ToString(), m.Groups[0].ToString().Replace("\r\n", "\r\t\r"));
                }

                textOutput.Replace("\r\n", "\r\r\r");
                textOutput.Replace("<%", "\r\r\n<%");
                textOutput.Replace("%>", "%>\r\r\n");
                textOutput.Replace("<%csharp%>\r\r\n", "<%csharp%>").Replace("\r\r\n<%/csharp%>", "<%/csharp%>");

                string[] strlist = Utils.Split(textOutput.ToString(), "\r\r\n");
                int count = strlist.GetUpperBound(0);

                for (int i = 0; i <= count; i++)
                {
                    if (strlist[i] == "")
                        continue;
                    strReturn.Append(ConvertTags(nest, sitepath, skinName, templateSubDirectory, strlist[i], templateId));
                }
            }
            if (nest == 1)
            {
                string template = string.Format("<%@ Page language=\"c#\" AutoEventWireup=\"false\" EnableViewState=\"false\" Inherits=\"{0}\" %>\r\n<%@ Import namespace=\"System.Data\" %>\r\n<%@ Import namespace=\"AspDIY.Net.Common\" %>\r\n{1}\r\n<script runat=\"server\">\r\noverride protected void OnInit(EventArgs e)\r\n{{\r\n\r\n\t/* \r\n\t\tThis page was created by AspDIY.Net Template Engine at {2}.\r\n\t\t本页面代码由AspDIY.Net模板引擎生成于 {2}. \r\n\t*/\r\n\r\n\tbase.OnInit(e);\r\n\r\n\ttemplateBuilder.Capacity = {3};\r\n{4}\r\n\tResponse.Write(templateBuilder.ToString());\r\n}}\r\n</script>\r\n", inherits, extNamespace, DateTime.Now, strReturn.Capacity, Regex.Replace(strReturn.ToString(), @"\r\n\s*templateBuilder\.Append\(""""\);", ""));

                string pageDir = Utils.MapPath(sitepath + "aspx\\" + templateId + "\\");
                if (!Directory.Exists(pageDir))
                    Utils.FolderCreate(pageDir);

                string outputPath = pageDir + templateName + ".aspx";

                using (FileStream fs = new FileStream(outputPath, FileMode.Create, FileAccess.ReadWrite, FileShare.ReadWrite))
                {
                    Byte[] info = Encoding.UTF8.GetBytes(template);
                    fs.Write(info, 0, info.Length);
                    fs.Close();
                }

            }
            if (nest == 2)
                headerTemplateCache.Add(sitepath + skinName + "/" + templateName, strReturn.ToString());

            return strReturn.ToString();
        }

        /// <summary>
        /// 转换标签
        /// </summary>
        /// <param name="nest">深度</param>
        /// <param name="sitepath">模板路径</param>
        /// <param name="skinName">模板名称</param>
        /// <param name="templateSubDirectory">子模板文件夹名称,生成顶级模板文件时为空,当生成子文件夹中的模板是为子文件夹名称</param>
        /// <param name="inputStr">模板内容</param>
        /// <param name="templateid">模板id</param>
        /// <returns></returns>
        private string ConvertTags(int nest, string sitepath, string skinName, string templateSubDirectory, string inputStr, int templateid)
        {
            string strReturn = "";
            string strTemplate;
            strTemplate = inputStr.Replace("\\", "\\\\");
            strTemplate = strTemplate.Replace("\"", "\\\"");
            strTemplate = strTemplate.Replace("</script>", "</\");\r\n\ttemplateBuilder.Append(\"script>");
            bool IsCodeLine = false;

            foreach (Match m in r[0].Matches(strTemplate))
            {
                IsCodeLine = true;
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(), "\r\n" + GetTemplate(sitepath, skinName, m.Groups[1].ToString(), templateSubDirectory, nest + 1, templateid) + "\r\n");
            }
            foreach (Match m in r[1].Matches(strTemplate))
            {
                IsCodeLine = true;
                if (m.Groups[3].ToString() == "")
                {
                    strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                        string.Format("\r\n\tint {0}__loop__id=0;\r\n\tforeach(DataRow {0} in {1}.Rows)\r\n\t{{\r\n\t\t{0}__loop__id++;\r\n", m.Groups[4], m.Groups[5]));
                }
                else
                {
                    strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                        string.Format("\r\n\tint {1}__loop__id=0;\r\n\tforeach({0} {1} in {2})\r\n\t{{\r\n\t\t{1}__loop__id++;\r\n", m.Groups[3], m.Groups[4], m.Groups[5]));
                }
            }

            foreach (Match m in r[2].Matches(strTemplate))
            {
                IsCodeLine = true;
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                    "\r\n\t}\t//end loop\r\n");
            }

            foreach (Match m in r[3].Matches(strTemplate))
            {
                IsCodeLine = true;
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                    string.Format("\r\n\tint {0}__loop__id=0;\r\nwhile({0}.Read())\r\n\t{{\r\n{0}__loop__id++;\r\n", m.Groups[1]));
            }

            foreach (Match m in r[4].Matches(strTemplate))
            {
                IsCodeLine = true;
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                    "\r\n\t}\t//end while\r\n" + m.Groups[1] + ".Close();\r\n");
            }

            foreach (Match m in r[5].Matches(strTemplate))
            {
                IsCodeLine = true;
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                    "\r\n\tif (" + m.Groups[1].ToString().Replace("\\\"", "\"") + ")\r\n\t{\r\n");
            }

            foreach (Match m in r[6].Matches(strTemplate))
            {
                IsCodeLine = true;
                if (m.Groups[1].ToString() == string.Empty)
                {
                    strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                    "\r\n\t}\r\n\telse\r\n\t{\r\n");
                }
                else
                {
                    strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                        "\r\n\t}\r\n\telse if (" + m.Groups[3].ToString().Replace("\\\"", "\"") + ")\r\n\t{\r\n");
                }
            }

            foreach (Match m in r[7].Matches(strTemplate))
            {
                IsCodeLine = true;
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                    "\r\n\t}\t//end if\r\n");
            }

            //解析set
            foreach (Match m in r[19].Matches(strTemplate))
            {
                IsCodeLine = true;
                string type = "";
                if (m.Groups[3].ToString() != string.Empty)
                {
                    type = m.Groups[3].ToString();
                }
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                    string.Format("\t{0} {1} = {2};\r\n\t", type, m.Groups[4], m.Groups[5]).Replace("\\\"", "\"")
                    );
            }

            foreach (Match m in r[21].Matches(strTemplate))
            {
                IsCodeLine = true;
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                                                 "\tfor (int i = 0; i < " + m.Groups[2] + "; i++)\r\n\t{\r\n\t\ttemplateBuilder.Append(" + m.Groups[1].ToString().Replace("\\\"", "\"").Replace("\\\\", "\\") + ");\r\n\t}\r\n");
            }

            foreach (Match m in r[23].Matches(strTemplate))
            {
                IsCodeLine = true;
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(), "\tcontinue;\r\n");
            }

            foreach (Match m in r[24].Matches(strTemplate))
            {
                IsCodeLine = true;
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(), "\break;\r\n");
            }

            foreach (Match m in r[8].Matches(strTemplate))
            {
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                    "Utils.StrToInt(" + m.Groups[2] + ", 0)");
            }

            foreach (Match m in r[9].Matches(strTemplate))
            {
                IsCodeLine = true;
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(), "templateBuilder.Append(Utils.UrlEncode(" + m.Groups[2] + "));");
            }

            foreach (Match m in r[10].Matches(strTemplate))
            {
                IsCodeLine = true;
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                              string.Format("\ttemplateBuilder.Append(Convert.ToDateTime({0}).ToString(\"{1}\"));", m.Groups[2], m.Groups[3].ToString().Replace("\\\"", string.Empty)));
            }

            //解析substring
            foreach (Match m in r[20].Matches(strTemplate))
            {
                IsCodeLine = true;
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                              string.Format("\ttemplateBuilder.Append(Utils.GetUnicodeSubString({0},{1},\"{2}\"));", m.Groups[2], m.Groups[3], m.Groups[4].ToString().Replace("\\\"", string.Empty)));
            }

            //解析{var.a}
            foreach (Match m in r[11].Matches(strTemplate))
            {
                if (IsCodeLine)
                    strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                        string.Format("{0}.{1}{2}", m.Groups[2], Utils.SubString(m.Groups[3].ToString(), 0, 1).ToUpper(), m.Groups[3].ToString().Substring(1, m.Groups[3].ToString().Length - 1)));
                else
                    strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                        string.Format("\");\r\n\ttemplateBuilder.Append({0}.{1}{2}.ToString().Trim());\r\n\ttemplateBuilder.Append(\"", m.Groups[2], Utils.SubString(m.Groups[3].ToString(), 0, 1).ToUpper(), m.Groups[3].ToString().Substring(1, m.Groups[3].ToString().Length - 1)));
            }

            //解析{request[a]}
            foreach (Match m in r[12].Matches(strTemplate))
            {
                if (IsCodeLine)
                    strTemplate = strTemplate.Replace(m.Groups[0].ToString(), "DNTRequest.GetString(\"" + m.Groups[2] + "\")");
                else
                    strTemplate = strTemplate.Replace(m.Groups[0].ToString(), string.Format("\" + DNTRequest.GetString(\"{0}\") + \"", m.Groups[2]));
            }

            //解析{var[a]}
            foreach (Match m in r[13].Matches(strTemplate))
            {
                if (IsCodeLine)
                {
                    if (Validator.IsNumeric(m.Groups[3].ToString()))
                        strTemplate = strTemplate.Replace(m.Groups[0].ToString(), m.Groups[2] + "[" + m.Groups[3] + "].ToString().Trim()");
                    else
                    {
                        if (m.Groups[3].ToString() == "_id")
                            strTemplate = strTemplate.Replace(m.Groups[0].ToString(), m.Groups[2] + "__loop__id");
                        else
                            strTemplate = strTemplate.Replace(m.Groups[0].ToString(), m.Groups[2] + "[\"" + m.Groups[3] + "\"].ToString().Trim()");
                    }
                }
                else
                {
                    if (Validator.IsNumeric(m.Groups[3].ToString()))
                        strTemplate = strTemplate.Replace(m.Groups[0].ToString(), string.Format("\" + {0}[{1}].ToString().Trim() + \"", m.Groups[2], m.Groups[3]));
                    else
                    {
                        if (m.Groups[3].ToString() == "_id")
                            strTemplate = strTemplate.Replace(m.Groups[0].ToString(), string.Format("\" + {0}__loop__id.ToString() + \"", m.Groups[2]));
                        else
                            strTemplate = strTemplate.Replace(m.Groups[0].ToString(), string.Format("\" + {0}[\"{1}\"].ToString().Trim() + \"", m.Groups[2], m.Groups[3]));
                    }
                }
            }

            strTemplate = ReplaceSpecialTemplate(sitepath, skinName, strTemplate);

            foreach (Match m in r[14].Matches(strTemplate))
            {
                if (m.Groups[0].ToString() == "{commonversion}")
                {
                    strTemplate = strTemplate.Replace(m.Groups[0].ToString(), Utils.Assembly_Version);
                }
            }

            //解析普通变量{}
            foreach (Match m in r[15].Matches(strTemplate))
            {
                if (IsCodeLine)
                    strTemplate = strTemplate.Replace(m.Groups[0].ToString(), m.Groups[2].ToString());
                else
                    strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                        string.Format("\");\r\n\ttemplateBuilder.Append({0}.ToString());\r\n\ttemplateBuilder.Append(\"", m.Groups[2].ToString().Trim()));
            }


            //解析==表达式
            foreach (Match m in r[16].Matches(strTemplate))
            {
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(), m.Groups[2] + "\"" + m.Groups[3] + "\"");
            }


            //解析csharpcode
            foreach (Match m in r[18].Matches(strTemplate))
            {
                IsCodeLine = true;
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(), m.Groups[1].ToString().Replace("\r\t\r", "\r\n\t").Replace("\\\"", "\""));
            }

            if (IsCodeLine)
            {
                strReturn = strTemplate + "\r\n";
            }
            else
            {
                if (strTemplate.Trim() != "")
                {
                    StringBuilder sb = new StringBuilder(35000);
                    foreach (string temp in Utils.Split(strTemplate, "\r\r\r"))
                    {
                        if (temp.Trim() == "")
                            continue;
                        sb.Append("\ttemplateBuilder.Append(\"" + temp + "\\r\\n\");\r\n");
                    }
                    strReturn = sb.ToString();
                }
            }
            return strReturn;
        }
    }
}